package com.ch.base.util;

import java.util.regex.Matcher;
import java.util.regex.Pattern;

public class MoneyUtil {
	/** 大寫數字 */
	private static final String[] NUMBERS = { "零", "壹", "貳", "參", "肆", "伍", "陸", "柒", "捌", "玖" };
	/** 整數部分的單位 */
	private static final String[] IUNIT = { "元", "拾", "佰", "仟", "萬", "拾", "佰", "仟", "億", "拾", "佰", "仟", "萬", "拾", "佰", "仟" };
	/** 小數部分的單位 */
	private static final String[] DUNIT = { "角", "分", "釐" };

	/**
	 * <b>阿拉伯數字轉中文金錢字串</b><br/>
	 * 如：10,001,000.03 -> 壹仟萬零壹仟元參分, 10000001000.03-> 壹仟萬零壹仟元參分
	 * @param	origStr	欲轉換之阿拉伯數字
	 * @return	中文金錢字串
	 */
	public static String moneyToChineseMonry(String origStr) {
		origStr = origStr.replaceAll(",", "");// 去掉","
		String integerStr;// 整數部分數字
		String decimalStr;// 小數部分數字

		// 初始化：分離整數部分和小數部分
		if (origStr.indexOf(".") > 0) {
			integerStr = origStr.substring(0, origStr.indexOf("."));
			decimalStr = origStr.substring(origStr.indexOf(".") + 1);
		} else if (origStr.indexOf(".") == 0) {
			integerStr = "";
			decimalStr = origStr.substring(1);
		} else {
			integerStr = origStr;
			decimalStr = "";
		}
		// integerStr去掉首0，不必去掉decimalStr的尾0(超出部分捨去)
		if (!integerStr.equals("")) {
			integerStr = Long.toString(Long.parseLong(integerStr));
			if (integerStr.equals("0")) {
				integerStr = "";
			}
		}
		// overflow超出處理能力，直接返回
		if (integerStr.length() > IUNIT.length) {
			System.out.println(origStr + ":超出處理能力");
			return origStr;
		}

		int[] integers = toArray(integerStr);// 整數部分數字
		boolean isMust5 = isMust5(integerStr);// 設置萬單位
		int[] decimals = toArray(decimalStr);// 小數部分數字
		return getChineseInteger(integers, isMust5) + getChineseDecimal(decimals);
	}

	/** 
	 * <b>金錢千位化 </b><br/>
	 * 如：1011110001 -> 1,011,110,001
	 * @param	origStr 欲轉換之金錢字串
	 * @return	字串
	 */  
	public static String formatMoney(String origStr) {  
		String result = "";
	    String reg = "(?<=[0-9])(?=(?:[0-9]{3})+$)";  
	    Pattern pattern = Pattern.compile(reg);
	    if (origStr.indexOf(".") > 0) {
	    	Matcher matcher = pattern.matcher(origStr.subSequence(0, origStr.indexOf(".")));  
	    	result = matcher.replaceAll(",") + origStr.substring(origStr.indexOf("."));
	    }else{
	    	Matcher matcher = pattern.matcher(origStr);  
		    result = matcher.replaceAll(",");
	    }
	    return result;  
	} 
	
	/**
	 * 整數部分和小數部分轉換為數組，從高位至低位
	 */
	private static int[] toArray(String number) {
		int[] array = new int[number.length()];
		for (int i = 0; i < number.length(); i++) {
			array[i] = Integer.parseInt(number.substring(i, i + 1));
		}
		return array;
	}

	/**
	 * 得到中文金額的整數部分。
	 */
	private static String getChineseInteger(int[] integers, boolean isMust5) {
		StringBuffer chineseInteger = new StringBuffer("");
		int length = integers.length;
		for (int i = 0; i < length; i++) {
			// 0出現在關鍵位置：1234(萬)5678(億)9012(萬)3456(元)
			// 特殊情況：10(拾元、壹拾元、壹拾萬元、拾萬元)
			String key = "";
			if (integers[i] == 0) {
				if ((length - i) == 13)// 萬(億)(必填)
					key = IUNIT[4];
				else if ((length - i) == 9)// 億(必填)
					key = IUNIT[8];
				else if ((length - i) == 5 && isMust5)// 萬(不必填)
					key = IUNIT[4];
				else if ((length - i) == 1)// 元(必填)
					key = IUNIT[0];
				// 0遇非0時補零，不包含最後一位
				if ((length - i) > 1 && integers[i + 1] != 0)
					key += NUMBERS[0];
			}
			chineseInteger.append(integers[i] == 0 ? key
					: (NUMBERS[integers[i]] + IUNIT[length - i - 1]));
		}
		return chineseInteger.toString();
	}

	/**
	 * 得到中文金額的小數部分。
	 */
	private static String getChineseDecimal(int[] decimals) {
		StringBuffer chineseDecimal = new StringBuffer("");
		for (int i = 0; i < decimals.length; i++) {
			// 捨去3位小數之後的
			if (i == 3)
				break;
			chineseDecimal.append(decimals[i] == 0 ? ""
					: (NUMBERS[decimals[i]] + DUNIT[i]));
		}
		return chineseDecimal.toString();
	}

	/**
	 * 判斷第5位數字的單位"萬"是否應加。
	 */
	private static boolean isMust5(String integerStr) {
		int length = integerStr.length();
		if (length > 4) {
			String subInteger = "";
			if (length > 8) {
				// 取得從低位數，第5到第8位的字串
				subInteger = integerStr.substring(length - 8, length - 4);
			} else {
				subInteger = integerStr.substring(0, length - 4);
			}
			return Integer.parseInt(subInteger) > 0;
		} else {
			return false;
		}
	}

}